home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
LOGIC Apps
/
Logic-APPLE_II_APPS.iso
/
pc
/
LOGIC Apple II 5.25" Library - DOS Part 3
/
DOS077A.dsk
/
CURSOR NO FLASH.bas
< prev
next >
Wrap
BASIC Source File
|
2012-02-16
|
392b
|
3 lines
10 REM <CTRL-J><CTRL-M>NFC HELLO BY RICHARD E RETTKE<CTRL-M>1757 ACORN CT, MENASHA, WI 54952<CTRL-M>(414) 731-7091 * 80-09-24<CTRL-J><CTRL-M>CALL -APPLE * NOV-DEC 1980<CTRL-J>
100 HX$ = "300:20 54 FF 9A 68 18 69 11 85 38 68 69 0 85 39 20 EA 3 60 48 29 3F 91 28 68 4C 1B FD D0 ND823G": FOR I = 1 TO LEN(HX$): POKE 511 +I, ASC( MID$ (HX$,I,1)) +128: NEXT : POKE 72,0: CALL -144
110 CALL 768